home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / DYN401.ZIP / examples / exam30 / main.c < prev    next >
C/C++ Source or Header  |  1995-09-27  |  2KB  |  102 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6. /*
  7.  *
  8.  *    This source code is CONFIDENTIAL and
  9.  *    PROPRIETARY to Algorithms Corporation. Unauthorized
  10.  *    distribution, adaptation or use    may
  11.  *    be subject to civil and    criminal penalties.
  12.  *
  13.  *    Copyright (c) 1993 Algorithms Corporation
  14.  *    3020 Liberty Hills Drive
  15.  *    Franklin, TN  37064
  16.  *
  17.  *    ALL RIGHTS RESERVED.
  18.  *
  19.  *
  20.  *
  21.  */
  22.  
  23.  
  24.  
  25. #include "generics.h"
  26.  
  27.  
  28. main(int argc, char *argv[])
  29. {
  30.     object    myObj, seq, lnk;
  31.  
  32.  
  33.     InitDynace(&argc);
  34.  
  35.  
  36.     myObj = gSubClasses(Object);
  37.     for (seq=gSequence(myObj) ; lnk = gNext(seq) ; )
  38.         gPrint(lnk, stdoutStream);
  39.     gDispose(myObj);
  40.  
  41.  
  42.     printf("\n\n");
  43.  
  44.     myObj = gSuperClasses(Dictionary);
  45.     for (seq=gSequence(myObj) ; lnk = gNext(seq) ; )
  46.         gPrint(lnk, stdoutStream);
  47. /*    gDispose(myObj);  */
  48.  
  49.  
  50.     printf("\n\n");
  51.  
  52.     printf("%s\n", gIsKindOf(myObj, Object) ? "Yes" : "No");
  53.     printf("%s\n", gIsKindOf(myObj, LinkObject) ? "Yes" : "No");
  54.     printf("%s\n", gIsKindOf(myObj, LinkList) ? "Yes" : "No");
  55.     printf("%s\n", gIsKindOf(myObj, Dictionary) ? "Yes" : "No");
  56.  
  57.  
  58.     printf("\n\n");
  59.  
  60.     printf("%s\n", IsaClass(Link) ? "Yes" : "No");
  61.     printf("%s\n", IsaClass(myObj) ? "Yes" : "No");
  62.  
  63.     printf("\n\n");
  64.  
  65.     printf("%s\n", IsInstanceOf(myObj, LinkObject) ? "Yes" : "No");
  66.     printf("%s\n", IsInstanceOf(myObj, LinkList) ? "Yes" : "No");
  67.  
  68.     printf("\n\n");
  69.  
  70.     printf("%s\n", RespondsTo(myObj, gFirst) ? "Yes" : "No");
  71.     printf("%s\n", RespondsTo(myObj, gDispose) ? "Yes" : "No");
  72.     printf("%s\n", RespondsTo(myObj, gShortValue) ? "Yes" : "No");
  73.  
  74.  
  75.     return 0;
  76. }
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84. /*
  85.  *
  86.  *    This source code is CONFIDENTIAL and
  87.  *    PROPRIETARY to Algorithms Corporation. Unauthorized
  88.  *    distribution, adaptation or use    may
  89.  *    be subject to civil and    criminal penalties.
  90.  *
  91.  *    Copyright (c) 1993 Algorithms Corporation
  92.  *    3020 Liberty Hills Drive
  93.  *    Franklin, TN  37064
  94.  *
  95.  *    ALL RIGHTS RESERVED.
  96.  *
  97.  *
  98.  *
  99.  */
  100.  
  101.  
  102.